home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #1 / Amiga Plus CD - 1997 - No. 01.iso / pd / programmierung / installproged / sasc_support / nexterror.script < prev    next >
Text File  |  1996-03-11  |  449b  |  31 lines
  1. /*******************************************
  2.  *
  3.  * NextError.script
  4.  * by Giovanni Lambiase (C) 1995
  5.  *
  6.  * This Arexx macro jump to Next error in
  7.  * SCMSG list.
  8.  *
  9.  *******************************************/
  10.  
  11. OPTIONS RESULTS
  12. OPTIONS FAILAT 31
  13.  
  14. IF SHOW('PORTS','SC_SCMSG') THEN
  15. DO
  16.     ADDRESS 'SC_SCMSG'
  17.  
  18.     /* If no errors -> close SCMSG */
  19.     'TEXT'
  20.     IF RESULT='' THEN
  21.     DO
  22.         'HIDE'
  23.     END
  24.     ELSE
  25.     DO
  26.         /* Jump to next error */
  27.         'NEXT'
  28.         'SELECT'
  29.     END
  30. END
  31.